<% dim cpage, rpage, sqlpage set cpage=server.createobject("adodb.connection") cpage.open DSN_NAME sqlpage="select * from pages where page_id=19" set rpage=server.createobject("adodb.recordset") rpage.open sqlpage, cpage, 3 dim page_content, page_title if not rpage.eof then page_content=rpage("page_content") page_title=rpage("page_title") else page_content=" " page_title=" " end if %> <%=page_content%>